home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmCM_1014_TTextListView < prev    next >
Encoding:
Text File  |  1992-04-08  |  886 b   |  35 lines

  1. %case doChoice%
  2.     %DoChoice%
  3. %case itemNr%
  4.     %DefineItem%
  5. %case classDecl%
  6.     /*----------*/
  7.     class %classname% : public %superClass% {
  8.       public:
  9.         // instance variables:
  10.         // methods:
  11.         virtual pascal void GetItemText        (short            anItem, 
  12.                                              StringPtr        aString);    // override
  13.     #if qInspector
  14.         virtual pascal void Fields    (pascal void (*DoToField)
  15.                                             (StringPtr        fieldName, 
  16.                                              Ptr            fieldAddr, 
  17.                                              short            fieldType, 
  18.                                              void            *DoToField_StaticLink),
  19.                                      void    *DoToField_StaticLink);        // override
  20.     #endif
  21.     }; /* %classname% */
  22.  
  23. %case gDeadStripSuppression%
  24.     %StripSuppression%
  25. %case classMethods%
  26.     #pragma segment ARes
  27.     /*----------*/
  28.     pascal void %classname%::GetItemText%    %(short            anItem, 
  29.                                              StringPtr        aString)
  30.     {
  31.         NumToString ((long) anItem, aString);    // replace with something useful
  32.     } /* GetItemText */
  33.     
  34.     %ClassMethods%
  35.